assemble_damping_matrix Interface

public interface assemble_damping_matrix

Contents


Module Procedures

private subroutine assemble_damping_matrix_dense(gdof, elements, nodes, c)

Assembles a dense global damping matrix from a collection of discrete elements.

Arguments

Type IntentOptional Attributes Name
integer(kind=int32), intent(in) :: gdof

The total number of global degrees of freedom.

class(discrete_element), intent(in), dimension(:) :: elements

The discrete elements to assemble.

class(node), intent(in), dimension(:) :: nodes

The global node list.

real(kind=real64), intent(out), allocatable, dimension(:,:) :: c

The assembled gdof-by-gdof global damping matrix.

private subroutine assemble_damping_matrix_csr(gdof, elements, nodes, c)

Assembles a global damping matrix, in CSR format, from a collection of discrete elements.

Arguments

Type IntentOptional Attributes Name
integer(kind=int32), intent(in) :: gdof

The total number of global degrees of freedom.

class(discrete_element), intent(in), dimension(:) :: elements

The discrete elements to assemble.

class(node), intent(in), dimension(:) :: nodes

The global node list.

type(csr_matrix), intent(out) :: c

The assembled gdof-by-gdof global damping matrix in CSR format.